home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.whtech.com
/
ftp.whtech.com.tar
/
ftp.whtech.com
/
datasheets and manuals
/
Hardware
/
WHT
/
scsi
/
dsr_sources_2_2001
/
0scsihdr
< prev
next >
Wrap
Text File
|
2006-10-19
|
5KB
|
288 lines
BYTE >AA validation code
BYTE >03 version of dsr
DATA 0 number of apps / reserved
DATA PWRLNK powerup link
DATA 0 cartridge/application programs (illegal here)
DATA DEVLNK high level dsr link
DATA BASLNK subroutine link header
DATA INTLNK interrupt service routine link .
DATA 0 basic libs if in grom or at >6000
SID TEXT 'SCSI ' identification of this eprom
TEXT '1.5-0 '
TEXT 'March 16, 1998 '
* Linkage to powerup routine(s)
PWRLNK DATA 0 powerup link
DATA PWRUP
BYTE 0
INTLNK DATA 0
DATA INTL
* Linkage to high level routines
DEVLNK DATA DE1LNK
DATA SCSI0
BYTE 4
TEXT 'SCS1' * SCSI DEVICE #0
DE1LNK DATA DE2LNK
DATA SCSI1
BYTE 4
TEXT 'SCS2' * #1
DE2LNK DATA DE3LNK
DATA SCSI2
BYTE 4
TEXT 'SCS3' * #2
DE3LNK DATA DE4LNK
DATA SCSI3
BYTE 4
TEXT 'SCS4' * #3
DE4LNK DATA DE5LNK
DATA SCSI4
BYTE 4
TEXT 'SCS5' * #4
DE5LNK DATA DE6LNK
DATA SCSI5
BYTE 4
TEXT 'SCS6' * #5
DE6LNK DATA DE7LNK
DATA SCSI6
BYTE 4
TEXT 'SCS7' * #6
DE7LNK DATA DE8LNK
DATA SCSI7
BYTE 4
TEXT 'SCS8' * #7
DE8LNK DATA DE9LNK
DATA DSR20
BYTE 3
TEXT 'SCS'
DE9LNK DATA D10LNK
DATA SCSI0
BYTE 4
TEXT 'WDS1'
D10LNK DATA D11LNK
DATA SCSI1
BYTE 4
TEXT 'WDS2'
D11LNK DATA D12LNK
DATA SCSI2
BYTE 4
TEXT 'WDS3'
D12LNK DATA D13LNK
DATA SCSI3
BYTE 4
TEXT 'WDS4'
D13LNK DATA D14LNK
DATA SCSI4
BYTE 4
TEXT 'WDS5'
D14LNK DATA D15LNK
DATA SCSI5
BYTE 4
TEXT 'WDS6'
D15LNK DATA D16LNK
DATA SCSI6
BYTE 4
TEXT 'WDS7'
D16LNK DATA 0
DATA SCSI7
BYTE 4
TEXT 'WDS8'
BASLNK DATA BASLN3
DATA GPL27
BYTE 1
BYTE >27
BASLN3 DATA BASLN4
DATA GPL20
BYTE 1
BYTE >20
BASLN4 DATA BASLN5
DATA GPL21 Format Media
BYTE 1
BYTE >21
BASLN5 DATA BASLN6
DATA GPL1B SCSI direct
BYTE 1
BYTE >1B
BASLN6 DATA BASLN7
DATA GPL1C Examine SCSI unit
BYTE 1
BYTE >1C
BASLN7 DATA BSLN7A File protect/unprotect
DATA GPL22 (Not to be confused with GPL22 in bank 5!)
BYTE 1
BYTE >22
BSLN7A DATA BASLN8 File rename
DATA GPL23
BYTE 1
BYTE >23
BASLN8 DATA BASLN9 Access direct input file
DATA GPL24
BYTE 1
BYTE >24
BASLN9 DATA BASL10 Access direct outout file
DATA GPL25
BYTE 1
BYTE >25
BASL10 DATA BASL11
DATA GPL28
BYTE 1
BYTE >28
BASL11 DATA 0
DATA GPL29
BYTE 1
BYTE >29
*GPL20 LI R0,STINIT
* MOV R0,@STACK
*
* If we're doing a write, we have to invalidate the cache
*
* MOVB @>834C,R6
* ANDI R6,>0F00
* AI R12,24
* LDCR @B04,4 Select RAM bank 4
* LI R4,DNCASH
*PL20A CB *R4,R6
* JNE GPL20B
* CLR *R4
*PL20B AI R4,48
* CI R4,>5FFE-48
* JL GPL20A
* LDCR @ZERO,4 Select RAM bank 0
* BLWP @BANKIT
* DATA SCSI20
* INCT R11
* RT
GPL21 LI R0,STINIT
MOV R0,@STACK
BLWP @BANKIT
DATA SCSIFT
ANDI R12,>FF00
INCT R11
RT
GPL22
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA PROTEC
GPL23
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA RENAME
GPL24
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA SCSI24
GPL25
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA SCSI25
GPL28
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA MKDIR
GPL29
MOV R1,@SAVR1
MOV R11,@SAVR11
LI R0,STINIT
MOV R0,@STACK
BL @XFER
DATA RMDIR
GPL1B LI R0,STINIT
MOV R0,@STACK
BLWP @BANKIT
DATA SCSICP
ANDI R12,>FF00
INCT R11
RT
GPL1C LI R0,STINIT
MOV R0,@STACK
BLWP @BANKIT
DATA SCSIEX
ANDI R12,>FF00
INCT R11
RT
*-----------------------------------------------------------
* NAME : INTRPT
*
* DESC : INTERRUPT SERVER ROUTINE FOR SCSI DSR
*
* PARM : R12 = CRU BASE OF SCSI CARD
*
* RET : NOTHING
*
* DEST : R1
IRQ EQU 0 INTERRUPT REQUEST
RRPI EQU >4FEE RESET PARITY/INTERRUPTS
INTL TB IRQ Is 5380 causing the interrupt ?
JNE INT1 No, not 5380
MOV @RRPI,R1 Yes, clear interrupt
INT1 RT Return